#
<init>
subevent(mapinit,);
zukan(warppos:*all,|=,yashiro);

#zukan(item:*all,>=,(,caskey)); and; evflagsw(pr_plane,==,1); if(nowres); fc(seiyu,apr,=,1); endif;
#item(check:aleq|alpt|bank,,1); or; item(check:aleq|alpt|bank,,1); and; item(check:eq,caskey,1); and; evflagsw(pr_plane,==,1); if(nowres); fc(seiyu,apr,=,1); endif;
#item(check:eq,gchyaku,1); or; 
item(check:eq,gchyakupp,1); and; item(check:eq,,1); and; item(check:eq,,1); and; item(check:eq,caskey,1); and; evflagsw(pr_plane,==,1); if(nowres); fc(seiyu,apr,=,1); endif;
#item(check:eq,,1); and; item(check:eq,,1); and; item(check:eq,caskey,1); and; evflagsw(pr_plane,==,1); and; item(check:eq,gchyakupp,1); if(nowres); fc(seiyu,apr,=,1); endif;

subevent(@setysrbgm,);


#O
<out>
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,21,-26,center); fc(*actor,dir,=,d); changemap(tB[h); fade(in,(type=fade,color=000000,wait=16));


#K
<to_hokora>
sound(sleep); fade(out,(type=fade,color=ffff00,wait=64)); fc(*actor,move,-4,11,center); fc(*actor,dir,=,d); changemap(Kn); fade(in,(type=fade,color=ffff00,wait=64));
evflagsw(pr_ysridou,==,0); if(nowres); fc(c2,apr,=,1); evflagsw(pr_ysridou,=,1); text(1,face=uam,̒IR̎Ђ֍s悤ɂȂI); endif;


<seiyu>
#evflag(zk_seiyu,=,1);
#zukan(face:seiyu,=,1);
evflag(*inmap:recov,!=,0); if(nowres);
text(1,(face=+evfch,swait=-1),u炠Â悤ȎR܂ł悤Ⴂ܂v);

#fc(*target,picset,fch,org:nrm,=,seiyu-act); fc(*target,ans,=,0); fc(*target,ani,=,0); wait(8); fc(*target,ani,=,1); feffect(recover3,,*actor,*actor,1); return;
fc(*target,startan,act0,-1); fc(*target,waitstan); feffect(recover3,,*actor,*actor,1);
return;

#feffect(up2,,*actor,*actor,1); return;
#subevent(recover2,);
#formem(party); member(select, recover,0, (max,max,0),(h(5))); nextmem();
formem(party); member(select,attack,10,((,inf,4,0,inf,		inf,inf),  (vp:-2,ep:-2),0,(vp:3/2,ep:3/2), eq3,		(n:-inf,:-inf),,,0,0,1,ng|ne|nc|nddm|nact,)); nextmem();
#text(0,S̖hEChԂɂȂI);
text(0,150܂őSI);
#fc(*target,ani,=,0); wait(8); fc(*target,picset,fch,org:nrm,=,*reset:nrm); fc(*target,ans,=,2);
fc(*target,endan); fc(*target,waitedan);
evflag(*inmap:recov,=,0);
end;
endif;

fc(*actor,pic,==,mame); if(nowres); text(1,(face=+evfch,swait=-1),u}񂳂̂pɂȂĂ炵Ă̂łˁ`BaɂȂA܂AɎfłv); end; endif;
#͖ƕȂ̂ŁAXAɎfȂċC|łBCȂ̂́Ał킩̂łc
#킽{֗VтɍŝłA͉ƕȂ̂ŁAX̕ӂ𗣂ȂĎcOłcc
#B{̂Alł
#B킽ɂ荇킹CxgIȂ̂̍\zɂ炵̂łABL̂ƂԂႤł˂c
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,(face=+evfch,swait=-1),uip[B̂pɂȂĂ炵Ă̂łˁ`B킽A킢Ƃ͋Ȃ̂łAł߂͓̂ӂȂł`Bi͊Oɋ鎖̂łA͂̓słɗ܂Ă܂v); end; endif;
#|pł˂cB
#܂pł˂cB
#Bi͊Oɋ鎖̂łA͂̓słɂcȂāAĂ܂
fc(*actor,pic,==,demond); if(nowres); text(1,(face=+evfch,swait=-1),uĂł˂BA}񂳂̂Ƃł͂ȂłHHv); end; endif;
fc(*actor,pic,==,grpeng); if(nowres); text(1,(face=+evfch,swait=-1),uA炵yMł˂v); end; endif;
fc(*actor,pic,==,rkdns); if(nowres); text(1,(face=+evfch,swait=-1),uĂł˂B̗́A킽͐HׂꂻɂȂłcv); end; endif;
#ł̗́Ai}OTȊāA킽͐HׂȂłc
fc(*actor,pic,==,shina); or; fc(*actor,pic,==,jshina); if(nowres); text(1,(face=+evfch,swait=-1),u^PmRĂł˂BLmRDłH@ςȈӖł͖łHv); end; endif;
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,(face=+evfch,swait=-1),uӂӁA˂cv); end; endif;
fc(*actor,pic,==,dhmo); or; fc(*actor,pic,==,dhmopure); if(nowres); text(1,(face=+evfch,swait=-1),ûṕAȂ񂾂Ȃ܂˂cv); end; endif;
fc(*actor,pic,==,ikenaitsuki); or; fc(*actor,pic,==,ikenai2); if(nowres); text(1,(face=+evfch,swait=-1),ulłH@킽̌ČȂł`BłÂl͂Ȃ񂾂}K}K܂˂cv); end; endif;
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-c2); if(nowres); text(1,(face=+evfch,swait=-1),ûpA킽ɎĂ邩܂񂪁AɊ֌WƂ͖݂łB킵Ă߂Ȃˁ`v); end; endif;
fc(*actor,pic,>=,yj-a3); and; fc(*actor,pic,<=,yj-a4-ert); if(nowres); text(1,(face=+evfch,swait=-1),uԂƃ_C^ȑł˂v); end; endif;
#fc(*actor,pic,>=,yj-a3); and; fc(*actor,pic,<=,yj-a4-ert); if(nowres); text(1,(face=+evfch,swait=-1),ûpA킽ɎĂ邩܂񂪁AɊ֌WƂ͖݂łB킵Ă߂Ȃˁ`BɂĂAƑ_ȑł˂cB킽ɂ͎Ȃł傤˂cv); end; endif;
fc(*actor,pic,>=,yj-a5); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,(face=+evfch,swait=-1),uԂƃ_C^ȑł˂BƂAĂȂccHv); end; endif;
#͂킽ɂƂCxgƂ̂̍\zr~[ɂ݂łǁAFXႢł˂c
#A\̂킽Ǝ悤Ȋ̂邩̂płˁH
#킽Ƃ͈āAX܂˂c
#킽Ƃ͈āA҂҂Ƃ܂˂c
#̂pccȂ񂾂킽Ǝ悤ȋCz܂ˁccBłAXiDłˁ`
#̂pccȂ񂾂킽Ǝ悤ȋCz܂ˁccBłAɊ֌W͖݂łB킵Ă߂Ȃˁ`
#̂pAԂXłAȂ񂾂킽Ǝ悤ȋCz܂˂cBłAɊ֌WƂ͖݂łB킵Ă߂Ȃˁ`
#A`I@łAԂXł˂
#ɂĂAȂ񂾂Xł˂cBƑA܂
#̂ṕA킽Ɠ̋Cz܂˂BłAŮ֌WƂ͖݂łcc
#ȏ̎͂킩ȂłB߂Ȃ˂cc
#fc(*actor,pic,==,metaele); or; fc(*actor,pic,==,hollele); if(nowres); text(1,(face=+evfch,swait=-1),u͂Ȋ̂邨pł˂cv); end; endif;
fc(*actor,pic,==,metaele); or; fc(*actor,pic,==,hollele); or; fc(*actor,pic,==,coral); if(nowres); text(1,(face=+evfch,swait=-1),usvcȃJ^`ł˂cv); end; endif;
fc(*actor,pic,==,shikyuu); if(nowres); text(1,(face=+evfch,swait=-1),ûṕA̔pЂł悭|llłˁHv); end; endif;
fc(*actor,pic,==,seiyu); or; fc(*actor,pic,==,seiyu-2); if(nowres); text(1,(face=+evfch,swait=-1),u킽łH@Ȃ񂾂JグĂ܂Ă܂A_lƂwȂ̂ł͂Ȃ̂łcBʂȃCxgƂ݂łBႢɂȂĂ܂Ă܂˂cv); end; endif;
#\rȗƂ킯ł͂܂񂪁A킽Ɏ̂AǂœGƂČ炵łBCtĂˁcv
#\ruȂ݂ɁAX́wxƂOtĂ܂Bς\Ƃ̎Œ炭󂳂Ă̂łA炱̂܂܂ɂȂ邩ȂłB̂ق͖Ɍ܂ĂȂ݂łv
#\ru΁AɈӖ͖݂Ȃ̂łA킽Ɏ̂ǂŌ炵łBACeĂƁAǂŃqg炵̂łcv
#Ȃ񂾂̃Q[̒ł͏ႢɂȂĂ܂Ă܂˂c
#Uɂ͊֌W݂Ȃ̂łA
#҂̊G̗Kp̃L݂ȊŁA\R`Ă肵܂B
#\ruꂩÂ悤ȂЂ𗧂ĂJĂ܂Ă܂A_lƂwȂ̂ł͂Ȃ̂łcBȂ̂ŁAF̋xȅƂĎg킹ĒĂ܂v
#fc(*actor,pic,==,seiyu); if(nowres); text(1,(face=+evfch,swait=-1),u킽łH@̂悤ȂЂ𗧂ĂJĂ܂Ă܂A_lƂwȂ̂ł͂Ȃ̂łcBȂ̂ŁAF̋xȅƂĎg킹ĒĂ܂v\ru^ȂbႢ܂ƁȀ݂Ȃ̂ŁAʂȃCxgƂ͖݂łcBAUɂ͊֌W݂Ȃ̂łA킽Ɏ̉AǂœGƂČ炵ł˂v); end; endif;
#fc(*actor,pic,==,seiyu); if(nowres); text(1,(face=+evfch,swait=-1),u킽łH@̂悤ȂЂ𗧂ĂJĂ܂Ă܂A_lƂwȂ̂ł͂Ȃ̂łcBȂ̂ŁAF̋xȅƂĎg킹ĒĂ܂v\ru킽ɂ͓ʂȃCxgƂ͖݂Ȃ̂łA킽Ɏ̉AǂœGƂĂ񂾂ނ񂩂Ƃ炵łBUɂ͊֌W݂Ȃ̂łcv); end; endif;
#킢p̉摜Ƃ̂͗pӂĖ݂łc
fc(*actor,pic,==,buzzou); if(nowres); text(1,(face=+evfch,swait=-1),u_Xpł˂B킽̑JĂ݂܂H@_KĂ̂܂cv); end; endif;
#H@@Ⴂ܂H@킽Ė{͐_lȂ瑽́cc_łˁH
fc(*actor,pic,>=,kokeshi); and; fc(*actor,pic,<=,maneki); if(nowres); text(1,(face=+evfch,swait=-1),uA炵l`ł˂v); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,(face=+evfch,swait=-1),upςĂ炵Ă̂łˁ`v); end; endif;
#BłA̎Ђ̒ł́Aς̂͂킽݂łc

evflag(ysrbgm,==,id(music:yashiro2)); if(nowres); text(1,(face=+evfch,swait=-1),uȂ񂾂₩ȕ͋CɂȂĂ܂˂v); end; endif;
text(1,(face=+evfch,swait=-1),uɉ܂񂪁A낵΁Aǂ肵ĂĂˁ`v);
#evflagsw(wp_omake,==,1); or; evflag(enzyj,!=,0); if(nowres); text(1,(face=+evfch,swait=-1),uA킽Ǝp̂ɏoꂽ܂񂪁AɊ֌WƂ͖݂łB킵Ă߂Ȃˁ`v); endif;
#evflagsw(pr_dfmoon2,==,1);


<prs_yashiro>
mc(,blrgn,&,C); if(nowres); text(1,face=+evfch,u%pty[e]łA߂̐̏yŕ̂͂ǂȂ̂ȂcHv); end; endif;

fc(*actor,pic,==,seiyu); or; fc(*actor,pic,==,seiyu-2); if(nowres); text(1,face=+evfch,u%pty[e]̎͂ƂĂhAhӂĂ邯ǁǍ̎pŁw%pty[e]͖GxƂ̂͊قĂقȂcv\ru΁ǍɎp̉҂ꏊƂ\𕷂BPė炵ǁA͂Ń]N]N邩cHv); end; endif;
#BȂłx̃p\RŁAɊւ񂪓邻Bv݂Ȃ񂾂
#fc(*actor,pic,==,seiyu); if(nowres); text(1,face=+evfch,u%pty[e]̎͂ƂĂhAhӂĂ邯ǁǍ̎pŁw%pty[e]͖GxƂ̂͊قĂقȂcv\ru΁ǍɎp̉҂GƂČꏊ炵ˁBx̃p\RŁAɊւ񂪓ĉ\𕷂v\ruv݂Ȃ񂾂ǁAɒH蒅܂ł̊Ԃő鎖łƂ\BlɂĂ͂Ȃ{łȂˁv); end; endif;
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-c3); if(nowres); text(1,face=+evfch,uꂪ\́ǍɎp̎ҒBˁH@͂̌̕䂩čDȂcBAMΏۂƂĂƂӖIHv); end; endif;
#ꂪ\́ǍɎp̎ҒBˁH@ł̌ɔׂƗc邵A͂̌̕䂩čDȂcBAMΏۂƂĂƂӖIH
#Ȃ񂩔hȊ̎pˁB͂̌̕䂩čDȂcBAMΏۂƂĂƂӖIH
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,uꂪ\́ǍɎp̎ҒBˁH@͂̌̕䂩čDǁAɂ̎pŔꂽACŋ鎩M͖Ȃcv); end; endif;
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,uip[ȂāǍɂ΂Ԃuŏ򉻂Ă܂ƎvI@łA킢ɂ͏ɓIȂ񂾂Ȃcv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,uϑĂ񂾂ˁHv); end; endif;

#fc(seiyu,apr,==,1); if(nowres);
text(1,face=+evfch,u͐KĂɂ͌ȂnȂ̂ǁAɂ킷Ɍʂ𒣂ĂĂ񂾁BłAɕK{ȏƂvfƂ͓ɖ݂v);
#͐KĂɂ͌ȂnȂ̂ǁAɂ킷Ɍʂ𒣂ĂĂ񂾁BłAɕK{ȏƂvfƂ͓ɖ݂
#͐KĂɂ͌ȂnȂ̂ǁAJĂ锒Ɍʂ𒣂ĂĂ񂾁B
#łAUɕK{ȏƂvfƂ͓ɖ݂
#end; endif;
#text(1,face=+evfch,u͐KĂɂ͌ȂnȂ̂ǁAƂɌʂ𒣂ĂĂ񂾁BłAUɕK{ȏƂvfƂ͓ɖ݂v);
#񕜁{ĂB
#̎Ђ̓I}P̂悤Ȃ̂ŁAɍUɖ𗧂ƂvfƂ͖݂B
fc(seiyu,apr,==,0); if(nowres); text(1,face=+evfch,uƁA݂͗ˁv); endif;
#Ȃ݂ɁA_Ƃł͖C
#B%pty[e]̏ꍇȀȂ͂ȂႢɂȂςȂɂȂ肻ȋCˁc
# else; text(1,face=+evfch,uv);
#b͕ς邯ǁAẍԁ̃p\Ȑ邽߂ɕKvȏ́AɒH蒅܂ł̊Ԃő鎖łƂ\BlɂĂ͂AȂ{łȂ
#else; text(1,face=+evfch,ub͕ς邯ǁAw%it[*henge].nmicxŕϐgĂƁAςlX݂v); 
#else; text(1,face=+evfch,uƌ΁AAglɂ͎XV_Q[o炵ˁB܂ɈӖ͖݂Ȃ񂾂ǁcv);


<prs_scsho>
text(1,face=+evfch,uw%ct2eS%cdxƉʂ̃Rs[AXNVEChEgŎBɂẮwexĂKv邩ˁv\ruʓIɂ́AʑŜ̃Rs[Ȃw%ct2%rsPrtScn%rcvgXN[%re%cdxÃEChẼRs[Ȃw%ct2%rsAlt%rcIg%re%cdxȂwPrtScnx@BEChEgƂ]Ȃ̂tėႤǂˁBʂɉʓRs[ł@\ĂǂȂ̂ɂˁv);
#text(1,face=+evfch,uw%ct2PrtScn%cdxƂ{^ƁAʑŜ摜ƂăRs[łĒmĂH@w%ct2vgXN[%cdxĂˁBɂẮwexăL[ĂKv邯ǂˁv\ruXɁwAltxȂPrtScnƁAݑIĂEChERs[łBłAEChE̘gƂtėĂƎזȎȂȁv\ruňꉞ̃\tgł́Aw%ct2eS%cdxŁAĝ݂Rs[鎖ł悤ɂȂĂBɂẮwexĂKv邩ˁBg͖ȂǁAAvP[VxQ[쐬Ȃ̂߂̋@\ł͂邩Ȃv);
#text(1,face=+evfch,uwAltxȂwPrtScnxƁAݑIĂEChERs[łĒmĂH@łAEChE̘gƂtėĂƎזȎˁBꉞ̃Q[ł́AweSxŁAĝ݂Rs[鎖ł悤ɂȂĂv);


<prs_pwr>
text(1,face=+evfch,uʂɃxグĂ΋CɂKv͖ƎvǁAw%stat[*atk1].nmicxw%stat[*atk2].nmicx⋭ĂǍnȔꍇȂw%ct2%stat[*pwr1].nmic%cdx́w%ct2%stat[*prt1].nmic%cdxȉ߂ƁACnȔꍇȂw%ct2%stat[*pwr2].nmic%cdx́w%ct2%stat[*prt2].nmic%cdxȉ߂ƁA_[WɏɂȂĂ܂v\rut%stat[*pwr1]%stat[*pwr2]΂⋭ĂAȏ̃_[W͏oȂ݂B܂oXdvĂ킯ǁAʂɃxグĒޏꍇ́A%stat[*atk1]%stat[*atk2]̕D悷ΗǂƎvv\ruw%ct2%stat[*dex1].nmic%cdxw%ct2%stat[*dex2].nmic%cdx́w%ct2%stat[*ddg1].nmic%cdxw%ct2%stat[*ddg2].nmic%cdx菭ȉ߂ꍇAl̎NB̏ꍇ́AUwǓȂȂĂ܂ˁBɒ[Ɋiȑɂ܂Ƃȃ_[Wɂ́AwUxwсxwx̑SĂ⋭Kv킯ˁv);
#text(1,face=+evfch,uxȋɒލہAw%ct2%stat[*atk1].nmic%cdxw%ct2%stat[*atk2].nmic%cdx𕨐⋭ĂA̖薳ɁA_[WɏɂȂĂ܂B܂ŊȋɒޕKv͖񂾂ǂˁcv\ru͑̌nȔꍇȂAw%ct2%stat[*pwr1].nmic%cdx́w%ct2%stat[*prt1].nmic%cdxȉ߂̂ACnȔꍇȂw%ct2%stat[*pwr2].nmic%cdx́w%ct2%stat[*prt2].nmic%cdxȉ߂̂v\rut%stat[*pwr1]%stat[*pwr2]΂⋭ĂAȏ̃_[W͏oȂ݂B܂oXdvĎǁAʂɃxグĒޏꍇ́A%stat[*atk1]%stat[*atk2]̕ɗ͂ΗǂƎvv\ruw%ct2%stat[*dex1].nmic%cdxw%ct2%stat[*dex2].nmic%cdxÁw%ct2%stat[*ddg1].nmic%cdxw%ct2%stat[*ddg2].nmic%cdx菭ȉ߂ꍇAl̎NB̏ꍇ́AUwǓȂȂĂ܂ˁBȋɂ܂Ƃȃ_[Wɂ́AwUxwсxwx̑SĂ⋭Kv킯ˁv);
#u{Q[̌vŹAƕςĂ_ƂāAU͂w_[W{xƁw˔j́x̓̗vfɕĂ鏊ˁB{Q[ɂẮwÚx͑O҂ŁA҂́wђʗ́xČĂłv\ruђʗ͂̎͂sĂƁAǂꂾU͂Ă_[WɏɂȂĂ܂Atɂǂꂾђʗ͂ĂA肪̓[̎ȏ̃_[W͏oȂB܂AoXdvĎǁAȋƐ킨ďꍇȊÓAU͂̕ɗ͂ΗǂƎvv
#\ruAƕςĂ鏊ƂāAU͂U͂Ɗђʗ͂ɕĂĂ̂B̂qofƁAU͂Q{ɑ΂Ď͂Q{ɂĂނ荇ȂǁA͂Q{Ɗђʗ͂Q{͊Sɒނ荇݂v


<prs_prt>
text(1,face=+evfch,uw%stat[*prt1].nmicxw%stat[*prt2].nmicx̉éÂqofƓlAZɂȂĂ炵BłA%ct2AeIXvZ%cdČĂ΂Ăw_[WÚ|́x菭GŁAw_[WÚ~iP|́ђʗ́jxĊ炵v\ruqofʂ̘bǁA͂ĂuoƔׂƃoXuCJ[ɂȂ鎖߂ŁACˁBuo{ɂȂĂA񕜂Ƃ𔲂ɂ΁A{ԂƂȂ邾Ȃ̂ɑ΂A͂{ɂȂƁAƂ͖oł悤ɂȂĂ܂ꍇ邩ˁv\ruŎ͂ႢƁA{ɂȂĂwǈႢoȂAł͒nȈႢȂƁA̕ӂ̕s肳ˁv\ruXɉ͂xɉďオ邩A̕ӂ̊iwȂĂ܂Ă邩ˁB̂qof̏ꍇ́AZSԈُɂE𖳎ʂ肭鎖ŁAoXĂ銴Ȃ̂Ȃv);
#\ruƁAw_[WÚ|́x̏ꍇAU͂Q{ɑ΂Ď͂Q{ɂĂA_[W͂Q{ɂȂĒނ荇ȂǁAقǂ̎̏ꍇ͒ނ荇ˁv
#\ruU͂Q{ɑ΂Ď͂Q{ɂĂނ荇ȂĖ邯ǁÃQ[̏ꍇ́AU͂U͂Ɗђʗ͂ɕ鎖ł͉Ă݂v
#text(1,face=+evfch,uw%stat[*prt1].nmicxw%stat[*prt2].nmicx̉éȂ̂qofƓlAZɂȂĂ炵Bqofʂ̘bǁA͂ĂuoƔׂƃoXuCJ[ɂȂ鎖߂ŁACˁv\ruuo{ɂȂĂA{ԂƂȂ邾Ȃ̂ɑ΂A͂{ɂȂƁAƂ͖oł悤ɂȂĂ܂ꍇ邩ˁv\ruŎ͂ႢƁA{ɂȂĂwǈႢoȂAł͒nȈႢȂƁA̕ӂ̕s肳ˁv\rũQ[̏ꍇ͂ɂāAȋ͂ɕ̐ɂȂȂȂĂ܂肵āAȂ񂾂CȂȂĂ邩ˁBXɃxŉ͂オ邩A̕ӂ̊iwȂĂ܂Ă̂v\rũQ[̏ꍇ́AZSԈُɂE𖳎ʂ肭鎖ŁAoXĂ銴Ȃ̂Ȃv\ruU͂Q{ɑ΂Ď͂Q{ɂĂނ荇ȂĖ邯ǁÃQ[̏ꍇ́AU͂U͂Ɗђʗ͂ɕ鎖ł͉Ă݂v);
#BɃCťQ[Ƃ͈̑̂
#B̃Q[ɂ͂vf͖wǖ݂ǁB̕ӂ͖FXƌ炵
#vfwǖB
#́AZSɂ肭鎖ŃoXĂ銴Ȃ̂Ȃ
#ȋɑ΂ẮAƏグxł͖wǐ틵̑ɂȂȂnȃXe[^XɂȂĂ鎖݂
#text(1,face=+evfch,uw%ct2%stat[*prt1].nmic%cdxw%ct2%stat[*prt2].nmic%cdxď⋭ł͂܂LȂȂǁAȏグƓG̍UقڊȂ܂łɌ炷łv\rȗ̃Q[ƓlA{ł͊{IɈZɂȂĂBw%ct2%stat[*ddg1].nmic%cdxƁw%ct2%stat[*ddg2].nmic%cdxɂĂlŁA̓_[W炷ɁAwǓȂȂv\ruQ[ʂ̘bǁA%cdp[*vp]ɔׂƁAoXuCJ[ɂȂ鎖߂ˁBɎRɃXe[^Xグ鎖ł^Cv̍ił́AƎ舵ӂȗvfɂȂ邩v);


<prs_tsukue>
text(1,face=+evfch,uXǁAzłb|鎖łBœʂȎNĂȎ͈݂ؖǂˁv);
#qofƊb̊b݂ȋ@\ǁÃQ[͏łPSNȏoo[Wł悤₭ꂽ݂
#̃Q[ł͂܂Ӗ͖ǂˁB
#B^Ȕ炯ł߂


<prs_noex>
#subevent(hengehanyou,);
text(1,face=+evfch,u͌oς܂ȂĂAip[œ|܂ł24炢ŒBł@݂B①ɂ̃ReBj[@\͔ŁBłTƂ͈ؖ炵A͂Ō݂̂̂ASCɂKv͖v\rủ̈Ӗ̂킩Ȃ悤Ȏd|X݂ǁÂ߂Ȃˁv\ruƁAX{X₻̌̎vȐ퓬ɂẮA퓬i͖݂B̕ӂ͕ʂɒiʂグ邵Ȃ񂶂ȂȁHv);
#text(1,face=+evfch,u͌oς܂ȂĂA{҂܂ł24炢ōUł@݂BReBj[Ƃ͔ŁBłTƂ͈ؖ炵A͂Ō݂̂̂ASCɂKv͖v\rủ̈Ӗ̂킩Ȃ悤Ȏd|X݂ǁÂ߂Ȃˁv\ruƁAX{XA{ҏI̎vȐ퓬ɂẮA퓬i͖݂B̕ӂ͕ʂɒiʂグ邵Ȃ񂶂ȂȁHv);
#ȂłAEoQ[̗v̂łUłIȂ̂ڎwĂƂȂƂŁcB
#evflagsw(pr_honpen,==,1); if(nowres); text(1,face=+evfch,uAɖ{҂͍UĂ񂾂ˁBX{XA{ҏI̎vȐ퓬ɂẮA퓬i͖݂B̕ӂ͕ʂɒiʂグ邵Ȃ񂶂ȂȁHv); endif;
#EoQ[IȍU@ڎwĂ݂B


<prs_excrt>
#subevent(hengehanyou,);
text(1,face=+evfch,uU鎞ɂ܂ɏoėwSharpxɊւb͂ĂH@CɂKv͑SǁAXɋHɁw%ctdEx-Sharp%cdxĂ̂o݂ŁAЗ͂Sharp̒SharpĊ݂B%ct2iNeBJ%cdĂˁv\ruSharpłoXuCJ[CȂ̂ɁA^Q[ɂȂႤˁIH@łAڂɊ|Ȃ܂܃NAႤlBȂ݂Ex-Sharp͖݂v\ruSharp̒SharpƌĂAPSharpQsĂ킯Ȃ݂BĂ܂ƁASharpmɏo悤ɂȂƓEx-Sharpmɏo悤ɂȂāAiNeBJ̃}ȂƂŁv\ruSharpmɏo邿傤ǂ̒iKŁAՂłSharpEx-Sharpo悤ɂΗǂǁAꂾƍx͏ՂłEx-Sharp܂ɒ߂邱ƂɂȂႤBŁAgݍ킹悤ȊɂȂĂ݂v);
#\ruSharpȉȂPɂQ񔻒肵Ă݂ǁASharpmɏo邿傤ǂ̒iKł́ASharpEx-Sharpo݂ȁAȊɂȂĂ݂v
#Ɨ]kǁA
#\ruSharp̒SharpƌĂAႦSharpom50ɂȂŁA50̒50Ď25ŏoAĎɂ͂ȂȂ݂BSharp̊mQȉȂEx-SharpSharp~SharpȂ񂾂ǁAQȏȂEx-SharpSharp~QĂȂ݂v\ruSharp100o悤ɂȂ邽߂ɂ́Åh50{̒UKvǁAɑ΂Ex-Sharp100o悤ɂȂ邽߂ɂ́Åh2500{̒UKv݂v


<prs_genshoku>
#subevent(hengehanyou,);
text(1,face=+evfch,uF炯Ƃ̂́Aڂ`J`JƂŁAǂȂ炵ˁBtɁAÂČhĂ̂\ڂɌAQ[̍ۂɂ͋CtĂˁBÂ̂ĕ͋C͏oՂ񂾂ǂˁcv);
#text(1,face=+evfch,ũQ[āAF炯Ŗڂ`J`J邩ȂˁBɂFXςȂǁAeLXg{bNX̔wiȊO͂ȂƂȂftHg256FŔĂs݂B}l͂ȂǂƎvv\rutɁAÂČhĂ̂\ڂɌAQ[̍ۂɂ͋CtĂˁBÂ̂ĕ͋C͏oՂ񂾂ǂˁcv);
#text(1,face=+evfch,ũQ[ČF炯Ŗڂ`J`J邩ȂˁB҂ĂZX܂Ŗ݂BȂƂȂftHg256FŔĂ炵cBA}l͂߂ȂBڂɗD͐S|ȂƂˁv\rutɁAÂČhĂ̂\ڂɌAQ[̍ۂɂ͋Ctė~łBÂ͋C͏oՂǁcv);


<prs_btdir>
text(1,face=+evfch,u퓬ʂ猩`ɂȂĂqofāAlBʂ̉Eɏoė̂ʓIۂˁB̐EƋtɂȂĂ邯ǁAɈӖ͖݂v\ruĂqofɌ炸AƂAjȂ񂩂AlEɔzu鎖݂ˁBƁAU肷ۂ̃Aj[V̎lƁALN^[Ȅꍇ͍ĂՂRɂȂ銴͂邩As肷̂ȁHv\rułAANVQ[V[eBOQ[̏ꍇ͎lȎAqofł^LANVQ[̂qofȂǁAlɂȂĂ̂ĊO邩AɎדł񂶂ȂȁcHv);
#ɐMƂ킯Ȃ݂
#text(1,face=+evfch,ũQ[̂悤ȁA퓬ʂ猩`ɂȂĂqofāAlB퓬ʂ̉Eɏoė̂ʓIۂˁB̃Q[ƋtɂȂĂ邯ǁAɈӖ킯ȂāACɂɍĂ炱ȂĂ݂v\rułAANVQ[V[eBOQ[͎lœGEȍ\}ɂȂ鎖Aŝ̗LqofɂlɂȂĂ̂邩AƎ悤Ȃ̂ƎvΕsRłȂHHv\ruƁAU肷ۂ̃Aj[V̎lƁALN^[Ȅꍇ͍ĂՂRɂȂ銴͂邩As肷̂ȁHv);
#text(1,face=+evfch,uƁÃQ[̂悤ȉ猩`̂qof퓬ɊĂ邩͌˘fȂǁAlB͍ɏoėBɈӖ킯ȂāACɂɍĂ炱ȂĂ݂v\rułAANVQ[V[eBOQ[͎lœGEȍ\}ɂȂ鎖AIqofɂȂĂ邩AƎ悤Ȃ̂ƎvΕsRłȂHHv);
#@ނ҂́AV[eBO͎lE̍\}ōĂ܂݂
#Bʂ͉EɏôۂˁB̊֌W̓sȁH
#AŎRHH
#text(1,face=+evfch,uʂ͎lEۂˁH@lɍĂCt炱ȂĂ܂݂BłAANVQ[V[eBOQ[͎lœGEȍ\}ɂȂ鎖AƎ悤Ȃ̂ƎvΕsRłȂHHv);


<prs_ranren>
mc(,blrgn,&,C); if(nowres); text(1,face=+evfch,u̐̓gCł͂ȂHv); end; endif;
#mc(,blrgn,&,C); if(nowres); text(1,face=+evfch,ȕȂĂȂB΁AΑ̐̒̂ǂɉ悤ȁcBł͂ȂAƒׂȂƂ킩ȂCv); end; endif;
#mc(,blrgn,&,C); if(nowres); text(1,face=+evfch,ȕȂĂȂv); end; endif;

text(1,face=+evfch,uAȂǁAm[qglׂƂAłƂ_ƂAssuł͖ƎvBĊOtɊȒP邩Hv\ru}i{̐̐ljqg݂Asl܂畷Ă݂Ƃv);
#text(1,face=+evfch,uI}Pvf̓AȂǁAm[qglׂƂAłƂ_ƂAssuł͖݂BĊOtɊȒP邩Hv\ruȂłAՓx̍킩ȂāA_͂ނ悤ȏԂœVȂĂƂBȂ݂ɁA{̐̐lqg݂Asl܂畷Ă݂Ƃv);
#u䂦ACđkł邩邩́A̎ƗLė~Ɛ؂ɎvĂƂȂƂBA]vȂ߉Ƃ͕̂ʂƂāv
#\ru䂦A߉ŊėlƂ͕ʂƂāAkɏĂēK؂ȎwEĂ邩ĺA̎ƗLė~Ɛ؂ɎvĂƂȂƂv
#\ru킴ƓɂĂĂ킯łȂāAՓx̊o킩炸A_͂ނ悤ȏԂłĂ݂BĊOtɊȒP邩Hv
#Bk鑊Ȃ悤
#\ru䂦A߉ŊėlƂ͕ʂƂāAkɏĂēK؂ȎwEĂ邩ĺA̎ƗLė~Ɛ؂ɎvĂƂA{ɂ悭tĂӎ݂ȊŁAO͍Œڂǂ񂶂ȂƂȂƂv
#\ru킴ƓɂĂĂ킯łȂāAk鑊ȂĎTԂŒ݂BAkɏĂēK؂ȎwEĂ邩ĺA̎ƗLė~ƂȂƂv
#\ru܂A߉ŊėlȏꍇA{lĂꍇȂƂA{ɂ悭tĂӎ݂ȊŁAO͍Œڂǂ񂶂ȂȁH@āA̍i𑼐lČꂽ猙łHv
#\ru܂A߉ŊėlȂƂA炩ϋɓIɑkꍇAӎ݂ȊŖO͍Œڂǂ낤ˁB{lĂȂƂƂāv\ru̍i𑼐lČꂽ猙Đl͑AԂA̘J͂𑼐ĺv
#ƂȂ{̒Nqg݂B
#\ruՓx̒ēˁBQ[͑ςǁAՓxsȂǂɂĂ̓K؂ȕ񍐂Ă邩Ă̂MdAhȐ싦͎҂ƎvBƌāAӌł߂ėĂ܂ĂAǂʂ͏ohȂƎvǂˁv
#\rul󂯂Cɂ߂邠܂A܂ŔMSɉĂꂽl̎𗠐؂悤Ȏ́A܂肨߂͂ȂBwql͐_lxƂF̐l͕ĂΗǂ
#text(1,face=+evfch,uU̓ȂǁAm[qgŃ_ƂAłƂlׂƂAssuł͂Ȃ݂v);


<prs_enevp>
mc(,blrgn,&,C); if(nowres); text(1,face=+evfch,ȕ񂾂ˁIH@΁AΑ̐̒̂ǂɉ悤ȁcBł͂ȂAƒׂȂƂ킩ȂCv); end; endif;
#mc(,blrgn,&,C); if(nowres); text(1,face=+evfch,u̐́AQ[Iɂ͓ʂȈӖ͑SȂACɂȂĂvv); end; endif;
#mc(,blrgn,&,C); if(nowres); text(1,face=+evfch,u̐ɂ͓ɕςd|Ȃǂ͑SCv); end; endif;

text(1,face=+evfch,uG̒ɂ͎XAcuoȉɂȂƁAsɕω݂̂Bf֕ˁIv\rutɍs̕ωꍇ́AꌂŃI[o[Lł悤ɂȂĂꍇ͉ǁAmǂȎアłuoPcZLƎvAgƕ֗Hv);
#̒ɂ́A킴ƂuoMMcčUƂADp̋Z݂


<prs_mchecker>
text(1,face=+evfch,uG̒ɂ͍s̃Aj[VA郂[V̎ނ̂炵ǁÃ[VƂꍇɂ͑ςˁHv\ruŁA݂Ɍw%ct2%it[*mchecker].nmic%cdxȂACe݂ĂāA̕ӂŔĂ݂v\ru%it[*mchecker]͌̂郂[VȂ悤ǁAPo[W݂ƂBނAx͑ɍƎvv);
#text(1,face=+evfch,uG̒ɂ͍s̃Aj[VA郂[V̎ނ̂炵ǁÃ[VƂꍇɂ͑ςˁBŁA݂Ɍw%ct2%it[*mchecker].nmic%cdxȂACe݂ĂāA̕ӂŔĂ݂v\ru%it[*mchecker]͌̂郂[VȂ悤ǁAw%ct2%it[*lT[`[].nmic%cdxĂ݂̂ƂBނAx͑ɍƎvv);
#̕ӂ̓A
#text(1,face=+evfch,uG̒ɂ͎XAȏ_[W^ƁAsɕω̂炵Ăv);


<prs_exrand>
#mc(,blrgn,&,C); if(nowres); text(1,face=+evfch,u̐̓gCł͂ȂHv); end; endif;

text(1,face=+evfch,uGƂo₨ɂ͑΂Ďɂ͋CÂHH@ACe͗Ƃ藎ƂȂ肷邩AƓˁBłAXe[^X̂ق͊SɌŒ݂BȂ񂩒r[ˁv);
#text(1,face=+evfch,uGƂo₨ɂ͑΂Ďɂ͋CÂHH@ACe͗Ƃ藎ƂȂ肷̂WIAo₨菭Ȃ肷R낤ĎłȂ炵v\rułAXe[^X̂ق͖SɌŒ݂v);
#ACe𗎂Ƃ藎ƂȂ肷̂ɍ킹炵


<prs_enesize>
#subevent(hengehanyou,);
text(1,face=+evfch,u퓬AG̑̊iB̔{Ɍ邩ȂǁA̍oBB̂Q{傫ꍇ͖{ɑ傫݂ǁB̂ĂqofƂ邠Ȃ񂾂ǁA{ɋlȂ̂łȂ̂AX˘fȂcHv\ruj[́w%ct2%sysm[*config].nmic%cdxŁw%ct2%sysm[*usebigbtp].nmic%cdxĂ̂nmɂƁABGƓ炢̑傫Ɍ悤ɂȂ炵ǁAg肵ĂȂAꕔ͋tɑ傫߂C邵Aȏkڂł͓Ăɂ͂ȂȂ݂v);
#u퓬AG̑̊iB̔{Ɍ邯ǁA傫Đݒ炵B͂`̃Q[ł͂悭鎖ŁAʂ͂ނƑ̊ïႢ傫񂾂ǁA{ɋlȂ̂łȂ̂AX˘fȂcHv\rũQ[̏ꍇ́AB̂Q{傫ꍇ͖{ɑ傫炵BꉞAG̎dlɍ킹摜쐬Ă݂ŁAj[Qy[Wڂ́w%sk[*\ݒ].nmicxŁw傫߂̒ԃogOgpxnmɂƏoėv\rułgƂ肵ĂȂAtɑ傫CƂAȏkڂł͓Ăɂ͂ȂȂ݂BҎg悭킩ĂȂƂv
#BɒԃL͌XœKɍ݂̂


<prs_enemsg>
text(1,face=+evfch,uG̒ɂ́A߂đɉ̂ˁH@𖈉񕷂ꍇ́Aj[́w%ct2%sysm[*config].nmic%cdx́Aw%ct2%sysm[*dspenemsg].nmic%cdxĂ̂nmɂĂƂ炵v\ruxȂA{̗①ɂ̏Łw%ct2n%cdxZbgƂB̉ꏏɕႤǂˁv);
#text(1,face=+evfch,uG̒ɂ́A߂đɂZtoė̂ˁH@\邽߂ɂ́Aw%ct2%sk[*\ݒ].nmic%cdx́w%ct2GZt\%cdxĂ̂nmɂĂƂ݂v\ruꉞA{̗①ɂ̏Łw%ct2n%cdxZbgƂ񂾂ǁẢꏏɕႤAxɃZbgKv邩˂v);
#uꉞA{̗①ɂ̏Łw%ct2n%cdxZbgƂ񂾂ǁẢꏏɕႤ˂v


#pX[h{I
<hondana>
text(1,face=uam,ł́Aw鋫̍UxwƏ̐ixws@̏CxBĂƁA̕ӂ肩ĊJ邽߂̈Í킩悤B);
item(check:aleq|alpt|bank,,1); and; evflagsw(pr_plane,==,1); and; evflagsw(pr_dfmoon,==,1); if(nowres); text(1,face=uam,Í́w%ct2ڂ񂨂ǂ%cdx悤iuځvƁuہv̑łԈႢɂӂjB); endif;
#text(1,face=uam,ũ^Xv);


#ΑK
<saisen>
text(1,face=uam,ΑKł͌ol̃Zbgł悤BłɃZbgꂽol̔̋KNė悤B\n%ct3IɎcuoőuoɂȂ܂B%cd);
while;
memslcbox(party:exp,molZbgn,,,3); if(nowres);
text(1,(lwait=0,select=͂\n,islc=1),%mem[s]̌ol{ɃZbg܂H);
evflag(*selected,==,0); if(nowres);
member(select,exp,==,0); if(nowres); text(1,face=uam,%mem[s]̌ol͊Ƀ[B); next; endif;
evflag(*64:instant1,=,mem(select,exp));
evflag(*64:instant1,/=,2);
member(select,exp,=,0, 0,0); subevent(resetvp,);
party(,gold,+=,evf(*64:instant1));
member(select,exp,=,0, 0,0); text(1,face=uam,%mem[s]̌olZbgA%evh[*instant1]~肵B);
endif;
next;
endif;
wend;

#text(1,face=tansu2,ƂUƖ֌WȗvfĂƁAƂꏊōł̂Ă܂BAɈӖ͂܂B);
#text(1,face=uam,ũ^Xv);


#{ԕtK̕\ǉ
<tansu>
evflagsw(pr_dspcdr,==,0); or; evflagsw(dspkeepr,==,0); or; evflagsw(dspcondr,==,0); if(nowres);
sound(warp); evflagsw(pr_dspcdr,=,1); evflagsw(dspkeepr,=,1); evflagsw(dspcondr,=,1); text(1,(face=uam,swait=-1),{ԕtiϐʂ̑ɑ΂ꍇ̏Ԉُ̕tjƎKiɂ𗎂ƂȂmj\悤ɂȂI);
else;
text(1,(face=uam,lwait=0,select=͂\n,islc=1),{ԕtK̕\neeɂ܂H\n%ct3ĂneeɂĂTȂǂ͗L܂B\nݒ̓j[́w%sysm[*config].nmicx́w%sysm[*btlnavi].nmicxłł܂B);
#select2(reset,all); select2(+͂(id=0)); select2(+); select2(/); select2(*(cid=));
evflag(*selected,==,0); if(nowres); evflagsw(dspkeepr,=,0); evflagsw(dspcondr,=,0); text(1,(face=uam,swait=-1),{ԕtK\ɂB); endif;
endif;


#Ђ̉yύX
<changebgm>
select2(reset,all);
select2(+m[}(id=music:yashiro));
select2(+(id=music:yashiro2));
#select2(+؂ւ(id=0));
#select2(+(ic=close));
select2(/evf(ysrbgm));
while;
select2(*Ђ̂afl؂ւ(cid=));

if(evf(*selected)>=0); evflag(ysrbgm,=,evf(*selected)); subevent(@setysrbgm,); next; endif;
#evflag(*selected,==,0); if(nowres); evflagsw(ysrbgm,^=); subevent(@setysrbgm,); endif
wend;


#Ђ̉yύX
<setysrbgm>
music(main,+=,*sv/evf(ysrbgm));
#if(evf(*sw:ysrbgm)==1); music(main,+=,yashiro2); else; music(main,+=,yashiro); endif;
if(evf(ysrbgm)==id(music:yashiro2)); fc(seiyu,picset,fch,org,=,(nrm=seiyu-2,act0=seiyu-2-act)); else; fc(seiyu,picset,fch,org,=,(nrm=seiyu,act0=seiyu-act)); endif;


<inwater>
text(1,face=uam,̒ɐΔ肪łI);
#text(1,face=+evfch,LmR̓A^LmȐɋGB);
#zukan(enemy:*all,,(jshina,senkshag)); if(nowres); text(1,face=uam,uw%ene[*jshina]x̐̏񂾂悤v); end; endif;
text(1,face=+evfch,鋫̋zҁA̒A܂͗eւƍ~ׂB);
#̕voׂB
evflagsw(pr_towelix,==,1); if(nowres); text(1,face=uam,Łw%it[*GNT[].nmicx𓾂@ɂĂ̎悤B); endif;
#item(check:aleq|alpt|bank,],1); if(nowres); text(1,face=uam,w%it[*]].nmicx̉@ɂĂ̕⑫悤B); endif;
#evflagsw(pr_dfmoon,==,0); if(nowres); text(1,face=uam,uCɂȂĂǂv); end; endif;


<bonsai>
text(1,face=uam,u̖~͂v);


<relief>
text(1,face=uam,ȕ̂悤v);